home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX Base Documentation 1998 November
/
IRIX 6.5.2 Base Documentation November 1998.img
/
usr
/
share
/
catman
/
p_man
/
cat3
/
f90
/
pxfgetgid.z
/
pxfgetgid
Wrap
Text File
|
1998-10-30
|
2KB
|
54 lines
PXFGETGID(3F) Last changed: 1-6-98
NNAAMMEE
PPXXFFGGEETTGGIIDD - Gets the real group ID
SSYYNNOOPPSSIISS
SSUUBBRROOUUTTIINNEE PPXXFFGGEETTGGIIDD ((_i_g_i_d,, _i_e_r_r_o_r))
IINNTTEEGGEERR _i_g_i_d,, _i_e_r_r_o_r
IIMMPPLLEEMMEENNTTAATTIIOONN
UNICOS, UNICOS/mk, and IRIX systems
SSTTAANNDDAARRDDSS
IEEE standard interface for FORTRAN 77
DDEESSCCRRIIPPTTIIOONN
On IRIX systems, this routine is in lliibbffoorrttrraann..ssoo which is linked by
default when compiling programs with the MIPSpro 7 Fortran 90 compiler
or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
7.2 F77 compiler.
The PPXXFFGGEETTGGIIDD subroutine uses the ggeettggiidd(()) system call to get the real
group ID.
When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
UNICOS, UNICOS/mk, or IRIX, all arguments must be of default kind
unless documented otherwise. On UNICOS and UNICOS/mk, default kind is
KKIINNDD==88 for integer, real, complex, and logical arguments; on IRIX, the
default kind is KKIINNDD==44.
The following is a list of valid arguments for this routine:
_i_g_i_d An output integer variable for the real group ID for the
current process.
_i_e_r_r_o_r An output integer variable that contains zero if PPXXFFGGEETTGGIIDD was
successful.
EEXXAAMMPPLLEESS
This example calls PPXXFFGGEETTGGIIDD and prints out the current real group ID
and the returned error.
program pxftest
integer igid, ierr
CALL PXFGETGID(igid,ierr)
print *,'igid = ',igid,' ierr = ',ierr
end
SSEEEE AALLSSOO
_A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-
2165, for the printed version of this man page.